package com.iscas.imchat.chat;

import java.io.IOException;
import java.net.InetSocketAddress;
import java.nio.ByteBuffer;
import java.nio.channels.*;
import java.text.SimpleDateFormat;
import java.util.Date;
import java.util.HashMap;
import java.util.Iterator;
import java.util.Map;
import io.netty.channel.ChannelHandlerContext;
import io.netty.channel.Channel;
import io.netty.channel.SimpleChannelInboundHandler;
import io.netty.channel.group.ChannelGroup;
import io.netty.channel.group.DefaultChannelGroup;
import io.netty.util.concurrent.GlobalEventExecutor;


public class GroupChatServer {

    //定义属性
    private Selector selector;
    private ServerSocketChannel listenChannel;
    private static final int PORT = 1884;

    //GroupChatServer构造方法  初始化工作
    public GroupChatServer() {
        try {

            //得到选择器
            selector = Selector.open();
            //初始化ServerSocketChannel
            listenChannel = ServerSocketChannel.open();
            //绑定端口
            listenChannel.socket().bind(new InetSocketAddress(PORT));
            //设置非阻塞模式
            listenChannel.configureBlocking(false);
            //将该listenChannel 注册到selector
            listenChannel.register(selector, SelectionKey.OP_ACCEPT);

        } catch (IOException e) {
            e.printStackTrace();
        }
    }


    //监听
    public void listen() {
        try {

            //循环处理
            while (true) {

                int count = selector.select(); //如果参数是0或没有参数的话就一直阻塞直到接收到请求
                if (count > 0) { //有事件处理

                    //遍历得到selectionKey 集合
                    Iterator<SelectionKey> iterator = selector.selectedKeys().iterator();
                    while (iterator.hasNext()) {
                        //取出selectionKey
                        SelectionKey key = iterator.next();

                        //监听到accept
                        if (key.isAcceptable()) {
                            SocketChannel sc = listenChannel.accept();
                            sc.configureBlocking(false);
                            //将sc注册到selector
                            sc.register(selector, SelectionKey.OP_READ);
                            //给出提示
                            System.out.println(sc.getRemoteAddress() + "上线 ");
                        }
                        if (key.isReadable()) { //通道发生read事件，即通道是可读的状态
                            //处理读（专门写方法..）
                            readData(key);

                        }

                        //当前的key 删除，防止重复处理
                        iterator.remove();
                    }
                } else {
                    System.out.println("等待...");
                }
            }

        } catch (IOException e) {
            e.printStackTrace();

        } finally {

        }
    }

    //读取客户端消息
    private void readData(SelectionKey key) {

        //定义一个SocketChannel
        SocketChannel channel = null;
        try {
            //取到关联的channel
            channel = (SocketChannel) key.channel();
            //创建buffer
            ByteBuffer buffer = ByteBuffer.allocate(1024);

            int count = channel.read(buffer);
            //根据count的值做处理
            if (count > 0) {
                //把缓存区的数据转换成字符串
                String msg = new String(buffer.array());
                //输出该消息
                System.out.println("form 客户端： " + msg);

                //向其他的客户端转发消息， 专门写一个方法来处理
                sendInfoToOtherClients(msg, channel);
            }

        } catch (IOException e) {
            try {
                System.out.println(channel.getRemoteAddress() + " 离线了...");
                //取消注册
                key.cancel();
                //关闭通道
                channel.close();
            } catch (IOException ioException) {
                ioException.printStackTrace();
            }
        }
    }

    //转发消息给其他客户(通道)
    private void sendInfoToOtherClients(String msg, SocketChannel self) throws IOException {

        System.out.println("进入sendInfoToOtherClients()");
        //遍历所有注册到selector 上的 SocketChannel,并排除 self
        for (SelectionKey key : selector.keys()) {
            System.out.println("进入for循环");
            //通过key 取出对应的 SocketChannel
            Channel targetChannel = (Channel) key.channel();
            // String addr = targetChannel.remoteAddress().toString();
            //System.out.println("IP:" +targetChannel.getRemoteAddress());
            //排除自己
            if (targetChannel instanceof SocketChannel && targetChannel != self) {
                System.out.println("获取到其他SocketChannel！！");
                //转型
                SocketChannel dest = (SocketChannel) targetChannel;
                //将msg 存储到buffer
                ByteBuffer buffer = ByteBuffer.wrap(msg.getBytes());
                //将buffer 的数据写入通道
                System.out.println("消息转发中....");
                dest.write(buffer);
            }else{
                System.out.println("未获取到其他的SocketChannel");
            }
        }
    }


    //转发消息给其他客户(通道)
    private void sendInfoToSomeone(String msg, ChannelHandlerContext ctx) throws IOException {

        System.out.println("进入sendInfoToSomeone()");


    }




  /*  public static void main(String[] args) {

        //创建一个服务器对象
        GroupChatServer groupChatServer = new GroupChatServer();
        groupChatServer.listen();

    }*/


    public class ServerMessageHandler extends SimpleChannelInboundHandler<String> {
        /**
         * 管理全局的channel
         * GlobalEventExecutor.INSTANCE 全局事件监听器
         * 一旦将channel 加入 ChannelGroup 就不要用手动去
         * 管理channel的连接失效后移除操作，他会自己移除
         */
        private ChannelGroup channels = new DefaultChannelGroup(GlobalEventExecutor.INSTANCE);
        /**
         * 为了实现私聊功能，这里key存储用户的唯一标识，
         * 我保存 客户端的端口号
         * 当然 这个集合也需要自己去维护 用户的上下线 不能像 ChannelGroup那样自己去维护
         */
        private Map<String,Channel> all = new HashMap<String,Channel>();

        private SimpleDateFormat sf = new SimpleDateFormat("yyyy-MM-dd HH:mm:ss");
        /**
         * 处理收到的消息
         */
        @Override
        protected void channelRead0(ChannelHandlerContext ctx, String msg)
                throws Exception {
            Channel channel = ctx.channel();
            /**
             * 这里简单判断 如果内容里边包含#那么就是私聊
             */
            if(msg.contains("#")){
                String id = msg.split("#")[0];
                String body = msg.split("#")[1];
                Channel userChannel = all.get(id);
                String key = channel.remoteAddress().toString().split(":")[1];
                userChannel.writeAndFlush(sf.format(new Date())+"\n 【用户】 "+key+" 说 : "+body);
                return;
            }

            //判断当前消息是不是自己发送的
            for(Channel c : channels){
                String addr = c.remoteAddress().toString();
                if(channel !=c){
                    c.writeAndFlush(sf.format(new Date())+"\n 【用户】 "+addr+" 说 : "+msg);
                }else{
                    c.writeAndFlush(sf.format(new Date())+"\n 【自己】 "+addr+" 说 : "+msg);
                }
            }

        }
        /**
         * 建立连接以后第一个调用的方法
         */
        @Override
        public void handlerAdded(ChannelHandlerContext ctx) throws Exception {
            Channel channel = ctx.channel();
            String addr = channel.remoteAddress().toString();
            /**
             * 这里 ChannelGroup 底层封装会遍历给所有的channel发送消息
             *
             */
            channels.writeAndFlush(sf.format(new Date())+"\n 【用户】 "+addr+" 加入聊天室 ");
            channels.add(channel);
            String key = channel.remoteAddress().toString().split(":")[1];
            all.put(key, channel);
        }
        /**
         * channel连接状态就绪以后调用
         */
        @Override
        public void channelActive(ChannelHandlerContext ctx) throws Exception {
            String addr = ctx.channel().remoteAddress().toString();
            System.out.println(sf.format(new Date())+" \n【用户】 "+addr+" 上线 ");
        }
        /**
         * channel连接状态断开后触发
         */
        @Override
        public void channelInactive(ChannelHandlerContext ctx) throws Exception {
            String addr = ctx.channel().remoteAddress().toString();
            System.out.println(sf.format(new Date())+" \n【用户】 "+addr+" 下线 ");
            //下线移除
            String key = ctx.channel().remoteAddress().toString().split(":")[1];
            all.remove(key);
        }
        /**
         * 连接发生异常时触发
         */
        @Override
        public void exceptionCaught(ChannelHandlerContext ctx, Throwable cause)
                throws Exception {
            //System.out.println("连接发生异常！");
            ctx.close();
        }
        /**
         * 断开连接会触发该消息
         * 同时当前channel 也会自动从ChannelGroup中被移除
         */
        @Override
        public void handlerRemoved(ChannelHandlerContext ctx) throws Exception {
            Channel channel = ctx.channel();
            String addr = channel.remoteAddress().toString();
            /**
             * 这里 ChannelGroup 底层封装会遍历给所有的channel发送消息
             *
             */
            channels.writeAndFlush(sf.format(new Date())+"\n 【用户】 "+addr+" 离开了 ");
            //打印 ChannelGroup中的人数
            System.out.println("当前在线人数是:"+channels.size());
            System.out.println("all："+all.size());
        }


    }


}
